//===== eAthena Script =======================================
//= Archer Class Tutorial and Job Specific Quest
//===== By: ==================================================
//= Fix up by Jukka
//===== Current Version: =====================================
//= 1.6
//===== Compatible With: =====================================
//= eAthena SVN (Testet in Trunk 88xx)
//===== Description: =========================================
//=
//===== Additional Comments: =================================
//= 1.0 Fully working
//= 1.1 optimized [Lupus] 1.2 fixed Weight check
//=	TODO: Test, Add correct misceffects numbers
//= 1.3 Moved Master Kavaruk (overlapped Phantasmic Arrow
//=	Skill quest NPC) [Lupus]
//= 1.4 Fixed experience gains to match upcoming rate adjustments. [SinSloth]
//= 1.5 Fixed bad NPC header data to comply with rev. 11603. [L0ne_W0lf]
//= 1.6 Fixed infinate loop. (bugreport:2393) [L0ne_W0lf]
//============================================================


//=================================================Bard ǧ====================================================
payon_in02,67,65,3	script	uC֤H#tu	51,{
	mes "[ǧ]";
	mes "Ҧû|ѡA";
	mes "O]RknA";
	mes "}GմIΪknA";
	mes "OkHaīGY~";
	next;
	mes "[ǧ]";
	if(Class == Job_Archer || Class == Job_Baby_Archer || Class == Job_Archer_High){
		mes "Ooh, you're an Archer?";
		mes "There was a time when I too";
		mes "was an Archer. But I've changed jobs, so now I entertain the masses with my songs and humor.";
		next;
		mes "[ǧ]";
		mes "Speaking of which...";
		mes "Let me tell you a joke!";
		mes "Trust me, it's hilarious~";
		mes "^333333*Ahem*^000000";
		emotion e_gasp;
		next;
		mes "[ǧ]";
		mes "A termite walks";
		mes "into a bar and says,";
		mes "'Is the bar tender here?'";
		mes "Hahahahaha!";
		mes "Bwehehehehe!";
		emotion e_lv;
		next;
		mes "[ǧ]";
		mes "Hahaha~!";
		mes "Goodness,";
		mes "I'm funny!";
		mes "Now, you try!";
		mes "Come on, make";
		mes "up a joke~!";
		emotion e_gg;
		next;
		if(Sex){
			menu "A joke, eh?",-;
			mes "["+ strcharinfo(0) +"]";
			mes "What did...";
			mes "the... Priest...";
			mes "say to the Verit?";
			next;
			mes "["+ strcharinfo(0) +"]";
			mes "'HEAL!'";
			mes "Um... Get it?";
			next;
			//misceffect EF_TALK_FROSTJOKE ;
			mes "[ǧ]";
			mes "Oh...";
			mes "My...";
			mes "God...";
			next;
			mes "[ǧ]";
			mes "That was the greatest";
			mes "joke I've ever heard in my";
			mes "life! You really have a natural";
			mes "talent for showmanship! You";
			mes "just have to become a Bard!";
		} else {
			menu "Scream!",-;
			next;
			//misceffect  ;
			mes "[ǧ]";
			mes "W-Wow...";
			mes "I don't know why, but that was truly amazing. You must have";
			mes "what it takes to become a Dancer...";
		}
		emotion e_no1;
		next;
		mes "[ǧ]";
		mes "But before any of that, you've got to get rid of the Archer look, no?";
		next;
		mes "[ǧ]";
		mes "Actually I'm a member of";
		mes "the ^3131FFArcher's Guild^000000 'Icarus' which is to the ^3131FFleft of the job change office^000000. You should be able to";
		mes "learn a lot from there.";
		next;
		mes "[ǧ]";
		mes "Now now, go learn";
		mes "everything and change";
		mes "jobs so that you can";
		mes "come play with me!";
		close;
	} else if(Class == Job_Bard || Class == Job_Clown || Class == Job_Baby_Bard){	//CHECK
		mes "Ooh...!";
		mes "You're...!";
		next;
		//misceffect EF_TALK_FROSTJOKE ;
		//ShowEffect "Bard ǧ#tu" EF_TALK_FROSTJOKE 
		emotion e_no1;
		mes "[ǧ]";
		mes "Let's see...";
		mes "I've been working";
		mes "on a new joke here,";
		mes "but I could use some";
		mes "feedback. You ready?";
		next;
		mes "[ǧ]";
		mes "What did the male";
		mes "Merchant say to the";
		mes "dancing Isis? Give up?";
		next;
		mes "[ǧ]";
		mes "'Mammonite!'";
		mes "Get it? 'Cuz he";
		mes "throws money at her";
		mes "and the word Mammonite";
		mes "sounds-- wait. It's not funny";
		mes "if I have to explain it, huh?";
		close;
	} else if(Class == Job_Dancer || Class == Job_Gypsy || Class == Job_Baby_Dancer){
		mes "Ooh...!";
		mes "Hello, hello!";
		mes "Wouldn't it be";
		mes "nice if we could";
		mes "perform together";
		mes "one of these days?";
		close;
	} else {
		mes "Aݰ_ӦnܵLڡA";
		mes "FAAڻǯܵAť";
		next;
		mes "[ǧ]";
		mes "ıoڬ[F..";
		mes "]ڤӥiRF..";
		mes "㫢!!!!!";
	}
	close;
}

//=================================================Sign====================================================
pay_arche,127,154,4	script	ХܵP#arc	835,{
	mes " }b ¾  ===>  ";
	mes " <===     d ";
	close;
}

//=================================================dڧJ jv====================================================
payon_in02,47,13,3	script	dڧJ jv	55,{

	mes "[dڧJ jv]";
	mes "wAA~HA";
	mes "ڬOddڧJ jvA";
	mes "wA";
	next;
	switch(select("߰'d'Ʊ:߰ݳ̪D:ͽͦ}b⪺Ʊ")){
	case 1:
		mes "[dڧJ jv]";
		mes "AťLA";
		mes "'d'Ʊ?";
		next;
		mes "[dڧJ jv]";
		mes "dOλesͻH";
		mes "ѪŸ̥hFAѩn_";
		mes "ӹLױӶAϱoeͻHĤơA";
		mes "ӤY@iC~";
		next;
		mes "[dڧJ jv]";
		mes "MGäOܲzQA";
		mes "OL_IߩMiA";
		mes "HLHd";
		next;
		mes "[dڧJ jv]";
		mes "o̩Ҵ쪺'd'AN";
		mes "GƤd@ˡAO@";
		mes "lDRzQPؼЪHһEa";
		next;
		mes "[dڧJ jv]";
		if(Class == Job_Novice || Class == Job_Baby){
			mes "If you'd like to become an Archer, why don't you go around and learn";
			mes "a few things about the profession? I'm sure you'll be able to hear plenty of stories around here.";
			close;

		} else if(Class == Job_Archer){
			mes "Since you're an Archer, you might";
			mes "benefit from going around and listening to everyone else's battle experiences. Becoming familiar with different fight scenarios will help you in the future.";
			close;

		} else if(Class == Job_Hunter || Class == Job_Sniper || Class == Job_Baby_Hunter){	//CHECK
			mes "In fact, there are a few members in our guild who handle Falcons and Arrows, just like you.";
			next;
			mes "[dڧJ jv]";
			mes "...But I don't seem to see any of them around here right now. They're always out exploring, I suppose. I'm sure that you'll be able to meet one of your colleagues";
			mes "here sometime, though.";
			close;

		} else if(Class == Job_Dancer || Class == Job_Gypsy || Class == Job_Baby_Dancer){	//CHECK
			mes "In fact, a few of our";
			mes "members specialize in";
			mes "capturing the fascination";
			mes "of those watching with their";
			mes "graceful dances, just like you.";
			next;
			mes "[dڧJ jv]";
			mes "...But I don't seem to see";
			mes "any of them around here right now. They never seem to remain in one";
			mes "place for very long. Still, I'm sure of them will turn up here";
			mes "one of these days.";
			close;

		} else if(Class == Job_Bard || Class == Job_Clown || Class == Job_Baby_Bard){	//CHECK
			mes "In fact, a few of our members";
			mes "are highly skilled in singing and entertaining their allies, much in the same way you do.";
			next;
			mes "[dڧJ jv]";
			mes "...But I don't seem to see any of them around here right now. They always wander wherever the wind takes them, but I'm sure one of them will wander back here one";
			mes "of these days.";
			close;
		}
		mes "They happen to know a lot of information about jobs related to Archers. Why don't you speak to them and learn more about";
		mes "these other jobs?";
		close;
		break;
	case 2:
		mes "[dڧJ jv]";
		if(Class == Job_Archer || Class == Job_Baby_Archer || Class == Job_Archer_High){
			if(tu_archer02 == 0){
				mes "Oh, it's a good thing";
				mes "you're here, "+strcharinfo(0)+".";
				mes "I've just received request for support from the Alchemist";
				mes "Guild in Al De Baran.";
				next;
				mes "[dڧJ jv]";
				mes "They've been taking care";
				mes "of a Flora field as a way of supplying their funds, but recently some stray cats seem to have been destroying the plants there.";
				next;
				mes "[dڧJ jv]";
				mes "Although the Alchemists have been using Alchemy to summon the Flora again to keep the field running, it's causing a strain on their resources.";
				next;
				mes "[dڧJ jv]";
				mes "They are willing to give rewards for bringing materials such as ^3131FFManeater Blossoms^000000 and ^3131FFStems^000000 which will help them restore";
				mes "their Flora.";
				next;
				mes "[dڧJ jv]";
				mes "If you're interested, it would probably be best to speak to the Alchemist Guild member who is waiting to hear from us at the ^3131FFshop next to road south of Icarus^000000.";
				set tu_archer02, 1;
				close;

			} else if(tu_archer02 == 1){
				mes "Hmmm...";
				mes "..........";
				next;
				menu "Is something the matter?",-;

				mes "[dڧJ jv]";
				mes "Actually, we have a problem.";
				mes "The position of master seems to have a lot of power, but I always need to remain here. I don't have the luxury of being able to leave my post.";
				next;
				mes "[dڧJ jv]";
				mes "I asked a member of Icarus to";
				mes "wander about the Rune Midgarts kingdom and gather news and information about what has been going on recenty.";
				next;
				mes "[dڧJ jv]";
				mes "He has been sending me letters containing detailed information, but all of a sudden, I've lost contact with him. I'm concerned over what may have happened.";
				next;
				mes "[dڧJ jv]";
				mes "Would you please go find ^3131FF of the Wind^000000 for me? Although he doesn't like people, I've ordered for him to wander within the crowds to gather information.";
				next;
				mes "[dڧJ jv]";
				mes "Please find out if he is all right and help him with whatever he";
				mes "may need. In the meantime, I will be waiting to hear from you. Thank you very much.";
				set tu_archer02, 2;
				close;

			} else if(tu_archer02 == 2){
				mes "Find ";
				mes "of the Wind for me.";
				mes "He must be somewhere";
				mes "in Prontera...";
				close;

			} else if(tu_archer02 == 9){
				mes "Hmmm, I see. Thank you";
				mes "for bringing me the news. As  has said, I shall wait until he has more news for me.";
				mes "You should also train and prepare for the future as well.";
				set tu_archer02, 10;
				getexp 2000,1000;
				close;

			}
		}
		mes "I don't know...";
		mes "Recently, I haven't heard any noteworthy news. For now, the warmth of the sun seems to be protecting the peace here.";
		next;
		mes "[dڧJ jv]";
		mes "But if I hear of";
		mes "any interesting rumors,";
		mes "I will let you know.";
		close;
		break;

	case 3:
		mes "[dڧJ jv]";
		if(tu_archer01 < 1){
			if(Class == Job_Novice || Class == Job_Baby){
				mes "Ah...";
				mes "So are you";
				mes "interested in";
				mes "becoming an Archer?";

			} else if(BaseClass == Job_Archer){
				mes "Although I can't deny that you're an expert, I suppose it is a good idea to review the basics of archery from time to time. Would you like to try some refresher training?";

			} else if(Class == Job_Archer || Class == Job_Baby_Archer){
				mes "As an Archer, I can see that you'd want to make sure that you have a strong grasp on the fundamentals";
				mes "of our job. Would you like some specialized instruction?";

			} else {
				mes "Although you may not be able";
				mes "to directly apply archery related knowledge, it's a good idea to understand the capabilities of";
				mes "your Archer allies.";
				next;
				mes "[dڧJ jv]";
				mes "How would you like";
				mes "some specialized instruction to learn more about the Archer job?";
			}
			next;
			switch(select("Yes:No")){
			case 1:
				set tu_archer01, 1;
				mes "[dڧJ jv]";
				mes "Ah yes. Well then, please";
				mes "take this message over to ^3131FF^000000 who is in the Training Grounds west of Icarus.";
				next;
				mes "^3355FFYou've received";
				mes "Kavaruk's message";
				mes "for .^000000";
				next;
				mes "[dڧJ jv]";
				mes " is very diligent,";
				mes "composed, intelligent and";
				mes "extremely capable. I believe";
				mes "that you can learn much from her.";
				close;
				break;
			case 2:
				mes "[dڧJ jv]";
				mes "Ah, I see. Well,";
				mes "Icarus will always welcome";
				mes "you with open arms. If you";
				mes "ever change your mind, feel";
				mes "free to come back."; 
				close;
				break;
			}
		} else if(tu_archer01 == 1 || tu_archer01 == 2){
			mes "Hmm...?";
			mes "What are you still";
			mes "doing here? Go to the";
			mes "hills west of Icarus and";
			mes "talk to ^3131FF^000000 to begin your special training.";
			close;

		} else if(tu_archer01 == 3){
			mes "So "+strcharinfo(0)+",";
			mes "Did you have a good experience? Learning theory alone is never too enjoyable, but it is necessary.";
			next;
			mes "[dڧJ jv]";
			if(Class == Job_Archer || Class == Job_Archer_High || Class == Job_Baby_Archer){
				mes "Now it is time to experience the principles you've just learned firsthand. Go speak to ^3131FFpB F^000000, who is just outside of this building, and he'll tell you about the different skills.";
				set tu_archer01, 4;
			} else {
				mes "Still, there's no need for you to do any field training since only Archers can actually participate";
				mes "in that.";
			}
			close;

		} else if(tu_archer01 == 4){
			mes "pB F is just outside of this building. Didn't you see him on your way in?";
			close;

		}
	}
	mes "You're great";
	mes "just as you are now.";
	mes "Still, if you feel like you need something, speak to any of the guild members and listen to their life experiences.";
	close;
}

//=================================================pB F====================================================
pay_arche,103,165,5	script	pB F#tu	832,{

	mes "[pB F]";
	if(MaxWeight - Weight < 2000){
		mes "Hey, you're carrying an";
		mes "awful lot of stuff. You ought";
		mes "to put some of your things";
		mes "into Kafra Storage...";
		close;
	}
	if(tu_archer01 > 0){
		if(tu_archer01 == 4){
			mes "Ah, what is it?";
			mes "Can I help you";
			mes "with something?";
			next;
			switch(select("Tell me about skills.:Er, not really...")){
			case 1:
				mes "[pB F]";
				mes "Huh. So Master";
				mes "Kavaruk told you";
				mes "to come to me, eh?";
				mes "Alright. Okay.";
				emotion e_gg;
				next;
				break;
			case 2:
				mes "[pB F]";
				mes "Huh...?";
				mes "Alright. You sure";
				mes "you've got nothing";
				mes "to ask me? You had";
				mes "that look, you know?";
				close;
				break;
			}
			mes "[pB F]";
			mes "Fine. I'm an incredibly";
			mes "busy guy, but I'll make time for you. I'll teach you what I know about Archer skills... On one condition!";
			next;
			mes "[pB F]";
			mes "From here on out, you gotta";
			mes "call me ^3131FFChief^000000, got it? Stick with me and you'll become the second best archer in the world! How";
			mes "about it, kid?";
			next;
			switch(select("You got it, Chief!", "Ugh, no thanks~!")){
			case 1:
				mes "[pB F]";
				mes "Ho ho!";
				mes "That's the way to go!";
				mes "Good good~ Call me Chief";
				mes "from now on, you hear?";
				next;
				break;
			case 2:
				mes "[pB F]";
				mes "Huh? What kind of attitude";
				mes "is that? Ah, I get it. You're not mature enough to recognize greatness when it's right";
				mes "before you.";
				next;
				mes "[pB F]";
				mes "Don't worry...";
				mes "When you come crawlin'";
				mes "back, I'll reconsider";
				mes "teaching you.";
				close;
				break;
			}
			mes "[pB F]";
			mes "Let's see...";
			mes "How much do you know?";
			mes "Mmmmmmmmmm...";
			next;
			mes "^3355FFpB F narrows his experienced eyes and sizes you up.^000000";
			next;
			mes "[pB F]";
			if(JobLevel > 39){
				mes "Hey! You're ready to change jobs, aren't you? Don't waste time here and just get a new job already! Eh, or you can ask dڧJ jv for something to do.";
				close;
			} else if(JobLevel < 5){
				mes "Alright! We got a fresh Archer here! You're lucky you came to me, I'm the best teacher you can find! But let me warn you, I teach at a really fast pace, so try to keep";
				mes "up. Okay? Good.";
				next;
				set tu_archer01, 5;
				mes "[pB F]";
				mes "Okay, I'm ready to begin the lessons! Come back over here once you've got your bow and arrows and everything else ready, got it?";
				close;
			} else {
				mes "Okay. It looks like you know";
				mes "some stuff. But even if you're";
				mes "a little experienced, there's still room for you to learn. So try and keep up, got it?";
				next;
				set tu_archer01, 5;
				mes "[pB F]";
				mes "Well, I'm ready to teach whenever you're ready to learn. Come back once your bow and arrows and everything else is ready, alright?";
				close;
			}
		} else if(tu_archer01 == 5){
			mes "You ready? I think it's fair to remind you that I won't tolerate any complaining! Just do what";
			mes "I say and you'll be the second best Archer in the world! After me, of course~";
			next;
			mes "[pB F]";
			mes "If you don't like it, you can just quit! No reason to stick around";
			mes "if you can't keep up with the Chief, anyway.";
			next;
			switch(select("Please teach me... Chief!:I want to quit.")){
			case 1:
				mes "[pB F]";
				mes "That's what I'm talkin' about! Yeah! Just trust me and you'll learn almost everything about Archer skills! Let's get started!";
				next;
				menu "Yes, Chief!",-;

				emotion e_ok;
				mes "[pB F]";
				mes "Great...!";
				mes "I like your style!";
				next;
				mes "[pB F]";
				mes "Now, open your Skill Window (Alt+S). You oughta be able to see two skills: ^FF0000Owl's Eye^000000 and ^FF0000Double Strafe^000000. First, I'll talk about Owl's Eye.";
				next;
				mes "[pB F]";
				mes "We Archers need to be able to preceive the movements of our targets from far away. Now, even during the night, nothing can escape the eyes of an owl.";
				next;
				mes "[pB F]";
				mes "So we gotta train our vision so that we see the way owls do. Now";
				mes "if you can't aim at your targets, you'd be horrible at archery, right? You gotta have Accuracy!";
				next;
				mes "[pB F]";
				set @skill_owl, getskilllv(43);
				if(@skill_owl < 3){
					set tu_archer01, 6;
					mes "Now, your first assignment";
					mes "is to learn ^3131FFLevel 3 Owl's Eye^000000!";
					mes "From Prontera, if you travel south, south and then west, you can fight Condors for your training.";
					next;
					mes "[pB F]";
					mes "You can head somewhere";
					mes "else if you want, but if you don't know any training areas, then";
					mes "just follow my great advice.";
					next;
					switch(select("I'll follow your advice, Chief!:I'll hunt somewhere else...")){
					case 1:
						mes "[pB F]";
						mes "I'll send you to";
						mes "Prontera for now,";
						mes "so don't forget the";
						mes "directions I gave you.";
						mes "Travel ^3131FFsouth^000000, ^3131FFsouth^000000,";
						mes "and then ^3131FFwest^000000.";
						next;
						switch(select("Leave right away~", "W-wait, let me get ready!")){
							case 1:
								mes "[pB F]";
								mes "When you struggle";
								mes "through the hardships";
								mes "of training, just think";
								mes "about trying to become as";
								mes "good as the greatest Archer";
								mes "ever: me.";
								emotion e_dots;
								next;
								mes "[pB F]";
								mes "Okay...!";
								mes "Off you go!";
								mes "To Prontera!";
								close2;
								warp "prontera",116,72;
								end;
								break;
							case 2:
								mes "[pB F]";
								mes "Hm...?";
								mes "What do you possibly";
								mes "need to prepare? Alright,";
								mes "do whatever it is you";
								mes "need to do...";
								close;
								break;
						}
						break;
					case 2:
						emotion e_an;
						mes "[pB F]";
						mes "Say what...?";
						mes "Alright, then.";
						mes "But the next time";
						mes "you come here, you better";
						mes "know Level 3 Owl's Eye!";
						close;
						break;
					}

				} else {
					emotion e_ag;
					mes "Huh. So you already know a little about Owl's Eye already, huh? Well then, I guess I oughta talk about something you don't know about!";
					set tu_archer01, 7;
					getexp 500,0;
					close;
				}
				break;
			case 2:
				mes "[pB F]";
				mes "Huh. Okay.";
				mes "And here I was";
				mes "getting ready to";
				mes "teach you all my";
				mes "archery secrets!";
				close;
				break;
			}
		} else if(tu_archer01 == 6){
			set @owl, getskilllv(43);
			if(@owl > 2){
				mes "Ah, you're";
				mes "finally back.";
				mes "You've kept me";
				mes "waiting for a while!";
				next;
				emotion e_gasp;
				mes "[pB F]";
				mes "Ah, but your eyes look a lot sharper than they used to be.";
				mes "Here, this is a small, special reward for you.";
				//misceffect EF_WIND ;
				set tu_archer01, 7;
				getexp 500,0;
				next;
				emotion e_pif;
				mes "[pB F]";
				mes "Not bad, but you really should master Owl's Eye. That means";
				mes "you need to learn it all the way";
				mes "up to Level 10!";
				next;
				mes "[pB F]";
				mes "Now, I guess I'll";
				mes "talk about a different";
				mes "skill in my next lecture, kay?";
				mes "Come back when you're ready";
				mes "to learn something new~";
				close;
			} else {
				mes "Hey! I told";
				mes "you to learn";
				mes "Level 3 Owl's Eye!";
				mes "Try not to learn something";
				mes "else by accident, okay?";
				close;
			}
		} else if(tu_archer01 == 7){
			mes "Alright, open";
			mes "your Skill Window.";
			mes "Since you have Level 3";
			mes "Owl's Eye, now you oughta be";
			mes "able to see the Vulture's Eye";
			mes "skill in the list too.";
			next;
			mes "[pB F]";
			mes "Now when you think";
			mes "about vultures, what";
			mes "exactly comes to mind?";
			next;
			switch(select("Sharp, precise eyes.", "You, Chief.")){
			case 1:
				mes "[pB F]";
				mes "Exactly!";
				break;
			case 2:
				emotion e_lv2;
				mes "[pB F]";
				mes "Hahahaha!";
				mes "Well, I am famous";
				mes "for my incredible";
				mes "vision and precision!";
				mes "^333333*Ahem*^000000 Anyway...";
				break;
			}
			next;
			mes "[pB F]";
			mes "Vultures circle the sky, find a target on the ground, and then very swiftly swoop down and ensnare their prey in their claws.";
			next;
			emotion e_lv;
			mes "[pB F]";
			mes "No doubt about it.";
			mes "Vultures are awesome!";
			next;
			mes "[pB F]";
			mes "The ^3131FFVulture's Eye^000000 skill allows";
			mes "you to train your vision to be like a vulture's. You'll increase your Attack Accuracy and can target enemies from further away.";
			next;
			emotion e_no;
			mes "[pB F]";
			mes "I know that you can attack";
			mes "from a distance now, but don't";
			mes "be satisfied with just your current attack range. Learn Vulture's Eye so you can attack from even further distances.";
			next;
			mes "[pB F]";
			mes "Now for your";
			mes "second assignment!";
			mes "Go hunt Mandagora!";
			mes "Mandagora don't move,";
			mes "so they're perfect for target";
			mes "practice from a distance!";
			next;

			set @eagle, getskilllv(44);
			if(@eagle < 3){
				mes "Alright, Mandagora usually live around Mt. Mjolnir. I can send you to Prontera, so just travel north, then east from there to find";
				mes "some of them.";
				next;
				mes "[pB F]";
				mes "Remember, the most";
				mes "important thing is to level the Vulture's Eye skill and test the distance of your attack range.";
				if(MaxWeight - Weight < 1000){
					mes "You've got plenty of arrows";
					mes "for that, so go for it!";
					set tu_archer01, 8;
					next;
				} else {
					next;
					mes "[pB F]";
					mes "Here's a little something to encourage you. Since Mandagora are Earth property monsters, these Fire Arrows will work really well.";
					set tu_archer01, 8;
					getitem 1752, 300;
					next;
				}
				mes "[pB F]";
				mes "Alright~";
				mes "Ready to go?";
				next;
				switch(select("Let's go!", "W-wait a minute!")){
				case 1: 
					mes "[pB F]";
					mes "Alright...!";
					mes "Get a move on!";
					close2;
					warp "prontera",116,72;
					end;
					break;
				case 2:
					mes "[pB F]";
					mes "You still need";
					mes "to get ready?";
					mes "Hurry it up!";
					close;
					break;
				}
			} else {
				mes "Eh?";
				mes "Wait a minute...";
				emotion e_what;
				next;
				mes "[pB F]";
				mes "You already";
				mes "learned Vulture's Eye!";
				mes "Why did I spend so much time explaining about it? Well, I guess we're ready to move on to the next lesson...";
				set tu_archer01, 9;
				getitem 1752, 500;
				next;
			}
		} else if(tu_archer01 == 8){
			set @eagle, getskilllv(44);
			if(@eagle < 3){
				mes "Mandagora lives in the area north and east of Prontera. Learn up to Level 3 Vulture's Eye and get acquainted with your attack range.";
				next;
				mes "[pB F]";
				mes "Okay...";
				mes "Are you";
				mes "ready to go?";
				next;
				switch(select("Go.", "Wait a moment.")){
				case 1: 
					mes "[pB F]";
					mes "Alright...!";
					mes "Get a move on!";
					close2;
					warp "prontera",116,72;
					end;
					break;
				case 2:
					mes "[pB F]";
					mes "You still need";
					mes "to get ready?";
					mes "Hurry it up!";
					close;
					break;
				}
			} else {
				mes "Ah, so you've learned";
				mes "a little something about Vulture's Eye! What do you think about it now? Ah, and here's a little reward for you before I start the next lesson~";
				set tu_archer01, 9;
				getitem 1752, 500;
				close;
			}
		} else if(tu_archer01 == 9){
			mes "Okay...";
			mes "Up till now we've";
			mes "studied Passive Skills.";
			mes "You know, Owl's Eye";
			mes "and Vulture's Eye.";
			next;
			mes "[pB F]";
			mes "Even though you may not be doing anything, Passive Skills are always in effect. Now, it's time for me to teach you about an Active Skill";
			mes "for Archers. Ready?";
			next;
			mes "[pB F]";
			mes "Today I'll tell";
			mes "you all about";
			mes "^3131FFDouble Strafe^000000!";
			mes "Whaddya think?";
			mes "Exciting, yes?";
			next;
			set @eagle, getskilllv(46);
			if(@eagle > 2){
				mes "["+strcharinfo(0)+"]";
				mes "I...";
				mes "I already know";
				mes "about Double Strafe.";
				next;
				mes "[pB F]";
				mes "...";
				mes "......";
				next;
				mes "[pB F]";
				mes "^333333*Sigh*^000000";
				mes "Next lesson...";
				set tu_archer01, 10;
				close;
			} else {
				mes "[pB F]";
				mes "Just like its name, Double Strafe allows you to attack enemies with your arrows twice in a row! Booyah~";
				next;
				mes "[pB F]";
				mes "As Double Strafe's level rises, its attack strength also increases. If you master this skill, you can do a great amount of da]kv to your enemies!";
				next;
				mes "[pB F]";
				mes "Hold your bow and arrow";
				mes "like this, concentrate, aim,";
				mes "then fire twice with all your";
				mes "might! Practice Double Strafe";
				mes "enough and you'll get used to it!";
				next;
				if(@eagle == 0){
					//misceffect EF_WIND;
					set tu_archer01, 10;
					getexp 0,500;
				}
				emotion e_no1;
				next;
				mes "[pB F]";
				mes "Now, there's another skill known as ^FF0000Arrow Shower^000000. Where Double Strafe uses 2 Arrows, Arrow Shower fires a bunch of arrows at once.";
				next;
				mes "[pB F]";
				mes "Not even I can handle";
				mes "Arrow Shower all that well since it's really hard. Still, maybe if you trained more at it, you'd manage to pull it off?";
				emotion e_heh;
				close;
			}
		} else if(tu_archer01 == 10){
			mes "Now, I've taught you a lot of stuff and I wanna make sure you retain all of it. That's why I want you to take this midterm. Your mission: ^FF0000Attack the Hydras^000000!";
			emotion e_no1;
			next;
			mes "[pB F]";
			mes "There's a ship that";
			mes "leads to Byalan Island in Izlude, Prontera's satellite city. Ride that ship to Byalan Island.";
			next;
			mes "[pB F]";
			mes "In the center of that island is the entrance to a dungeon where a lot of Hydras live. Remember that it's a water dungeon, and that ^3131FFWater resists Fire^000000, ^3131FFbut is weak against Wind^000000.";
			next;
			mes "[pB F]";
			mes "Now go and bring ^3131FF10 Tentacles^000000";
			mes "from hunting Hydra and ^3131FF1 Crystal Blue^000000, which you can get from hunting the Mushrooms there.";
			mes "Bring all of that and you pass~";
			next;
			mes "[pB F]";
			mes "It's easier to find Izlude if you pass by Prontera, so head towards the fields near Prontera. Alright, off you go, " + strcharinfo(0) + "~";
			set tu_archer01, 11;
			close;
		} else if(tu_archer01 == 11){
			if((countitem(962) > 9) && (countitem(991) > 0)){
				if(MaxWeight - Weight < 1000){
					mes "Why are you carrying";
					mes "so much stuff? You better put everything you don't need into Kafra Storage.";
					close;
				} else {
					mes "Hey, you're back!";
					mes "Let's see now...";
					next;
					emotion e_no1;
					mes "[pB F]";
					mes "Good! You pass.";
					mes "Don't forget that you gotta keep training and improve your skills. Before you know it, you'll be an expert almost as good as me!";
					//misceffect EF_WIND;
					set tu_archer01, 12;
					getexp 1000,1000;
					getitem 1707, 1;
					close;
				}
			} else {
				mes "Hey...";
				mes "You gotta bring";
				mes "^3131FF10 Tentacles^000000 and";
				mes "^3131FF1 Crystal Blue^000000 to pass my midterm! Go back to the dungeon on Byalan Island and get them!";
				close;
			}
		} else if(tu_archer01 == 12){
			mes "Alright, now there's only";
			mes "one more skill you need to know about. Personally, I think this one is crucial for every Archer...";
			next;
			mes "[pB F]";
			mes "Open your Skill Window.";
			mes "Make sure that you learn";
			mes "^FF0000Increase Concentration^000000.";
			mes "Now, how can I describe";
			mes "how to do it?";
			next;
			mes "[pB F]";
			mes "I guess that first, you gotta quiet your mind and enter a state of complete concentration. Steadily draw your bowstring back. If there's even a millisecond of imbalance, you'll miss.";
			next;
			mes "[pB F]";
			mes "We use Increase Concentration";
			mes "to keep ourselves calm and focused to ^3131FFmaximize certain abilities and stats^000000. This skill enhances our performance as Archers immensely!";
			next;
			mes "[pB F]";
			mes "You might not be able";
			mes "to see it now, but as you become more skilled, you'll eventually recognize all the benefits of this skill.";
			set tu_archer01, 13;
			close;
		} else if(tu_archer01 == 13){
			mes "^333333*Sigh*^000000";
			mes "It was a pain in the";
			mes "ass, but we're finally";
			mes "done with all of your lessons.";
			emotion e_pif;
			next;
			mes "[pB F]";
			mes "Ah, but it's not time for";
			mes "you to relax yet! Since I've given you a midterm, it's only fitting that I also give you a final!";
			next;
			mes "[pB F]";
			mes "Surprised, huh?";
			mes "Well, this test is a little harder, but I'll help you out so there's";
			mes "no need for you to fret.";
			next;
			mes "[pB F]";
			mes "Now, go to Mt. Mjolnir and hunt Floras. Your test will be to bring back ^3131FF5 Maneater Blossoms^000000 and";
			mes "^3131FF20 Stems^000000.";
			next;
			mes "[pB F]";
			mes "I know it's a little dangerous,";
			mes "but I've got a pal who'll be there to help you. Of course, she's still in training, but...";
			next;
			mes "[pB F]";
			mes "Oh...";
			mes "And one last thing.";
			mes "Take some of these.";
			next;
			mes "[pB F]";
			if(MaxWeight - Weight < 2100){
				mes "H-hey!";
				mes "Why are you carrying";
				mes "so much stuff? You better put everything you don't need into Kafra Storage.";
				close;
			} else {
				mes "This stuff is just a little something to encourage you, so don't take it the wrong way! Now hurry up, get what I asked for,";
				mes "and come back!";
				set tu_archer01, 14;
				getitem 601, 10; 
				getitem 501, 10;
				getitem 602, 1;
				close;
			}
		} else if((tu_archer01 == 14) || (tu_archer01 == 15)){
			if((countitem(1032) > 4) && (countitem(905) > 19)){ // Blossom Of Maneater & Stem
				mes "Ha-ha~!";
				mes "You look more like";
				mes "a veteran than a rookie";
				mes "now! Yeap, I can see it";
				mes "in your eyes.";
				next;
				mes "[pB F]";
				mes "Right, did you get a chance to meet my Acolyte pal, Mafra? She's pretty shy, but I hope you two got along.";
				next;
				mes "[pB F]";
				mes "I'm happy to tell";
				mes "you that you've passed";
				mes "my final exam! Here, take";
				mes "this little reward!";
				//misceffect EF_WIND ;
				set tu_archer01, 16;
				getexp 3000,3000;
				getitem 1770, 500;
				next;
				mes "[pB F]";
				mes "Well, it's like you're a full fledged Archer now. Honestly,";
				mes "I've got nothing more to teach you. Well, about archery, anyway.";
				emotion e_heh;
				next;
				mes "[pB F]";
				mes "Well, if you talk to him, dڧJ jv might have something for you to do. He happens to have me running around to doing errands";
				mes "for him too. That creep!";
				emotion e_pif;
				next;
				mes "[pB F]";
				mes "Well, "+ strcharinfo(0) +",";
				mes "It'd make me really happy if you get to the point where you develop a true love for the art of archery. I'll see you sometime, okay?";
				emotion e_no1;
				close;
			} else {
				mes "Remember, you";
				mes "need to head over to";
				mes "Mt. Mjolnir and get me";
				mes "^3131FF5 Maneater Blossoms^000000";
				mes "and ^3131FF20 Stems^000000.";
				next;
				mes "[pB F]";
				mes "From Prontera, you'd get to Mt. Mjolnir by traveling ^3131FFnorth^000000, ^3131FFnorth^000000 and then ^3131FFeast^000000. But if you want,";
				mes "I can just send you there.";
				next;
				switch(select("Go!:W-Wait!")){
				case 1:
					mes "[pB F]";
					mes "Alright!";
					mes "Oh, and if you get";
					mes "the chance, give a hello to my Acolyte pal over there for me~";
					emotion e_heh;
					close2;
					warp "mjolnir_11",25,221;
					end;
					break;
				case 2:
					mes "[pB F]";
					mes "Huh?";
					mes "Um, sure. But";
					mes "there's no reason to";
					mes "get so nervous, even if";
					mes "this my final exam for you.";
					close;
					break;
				}
			}
		} else if(tu_archer01 == 16){
			mes "I really like this town.";
			mes "There's so much lush greenery";
			mes "and the birds are always singing. Payon really is peaceful.";
			next;
			mes "[pB F]";
			mes "Of course, I've got friends here that I can trust with my life. We always argue, but we all want what's best for each other.";
			emotion e_pif;
			next;
			mes "[pB F]";
			mes "Wouldn't you";
			mes "agree that it's";
			mes "wonderful to have";
			mes "great friends?";
			close;
		} else {
			mes "I really like this town.";
			mes "Everything is green and birds singing all around.. such a peaceful place Payon is.";
			next;
			mes "[pB F]";
			mes "I feel so happy laying in the grass and looking up at the sky.";
			next;
			mes "[pB F]";
			mes "It might also be because I have my trustable friends here with me. Haha.";
			mes "We always argue, but we care for each other deep down inside.";
			emotion e_pif;
			next;
			mes "[pB F]";
			mes "..'friend' is a wonderful word. Don't you agree?";
			close;
		}
	}
	mes "Allow me to introduce myself. I'm the Archer of all Archers, ^3131FFpB F^000000, Master of the Icarus Guild!";
	next;
	emotion e_no1;
	mes "[pB F]";
	mes "Right now, we're having a special event! The application fee for the Icarus Guild has been slashed by 50%! Join now and there'll be no annual fees!";
	next;
	emotion e_lv;
	mes "[pB F]";
	mes "During our special event, we'll have no job class restrictions!";
	mes "As an added bonus, all new male members will be introduced to beautiful Dancer girls!";
	next;
	emotion e_heh;
	mes "[pB F]";
	mes "And new female members will have the special opportunity to go out on a date with me! Don't miss out!";
	next;
	emotion e_cash;
	mes "[pB F]";
	mes "Join right now";
	mes "for a one time fee of only ^3131FF1,000,000, zeny^000000! Hurry and join the Icarus Guild while";
	mes "this offer still lasts!";
	next;
	emotion e_pif;
	
	mes "[ȰǨ]";
	mes "Raiden...";
	mes "Stop messing around.";
	mes "Hey there, kid. The real";
	mes "master of the Icarus Guild";
	mes "is in that building.";
	next;
	emotion e_omg;
	mes "[pB F]";
	mes "ȰǨ...!";
	mes "Why'd you...?!";
	next;
	emotion e_ag;
	mes "[pB F]";
	mes "^333333*Sigh*^000000";
	mes "You got me, you got me.";
	mes "There's no application fee.";
	mes "But I'll still date all of";
	mes "those cute girls...";
	close;
}

//=================================================Arepesto====================================================
pay_arche,109,169,3	script	ȰǨ	712,{
	mes "[ȰǨ]";
	mes "The sky still looks clear, but recently the winds that have been blowing through the land seem to carry with them an air of misfortune.";
	next;
	emotion e_pif;
	mes "[pB F]";
	mes "So...";
	mes "Danger's coming?";
	mes "Heh! Chill, gramps~";
	mes "I got it covered!";
	next;
	emotion e_swt2;
	mes "[ȰǨ]";
	mes "Ho ho...";
	mes "Energetic, but";
	mes "cocky. Kids nowadays...";
	close;
}

//=====================================================================================================
pay_arche,84,139,3	script		727,{
	//misceffect EF_HIT2;
	mes "[]";
	mes "r- - !!";
	mes "Gs- !!!";
	//misceffect EF_HIT2;
	donpcevent "#vl::OnHit2";
	next;
	mes "[]";
	mes "ҿת}bANO";
	mes "ήeǷ|ϥΤ}bA";
	mes "ӦʪH٩I";
	next;
	mes "[]";
	mes "F}b⪱a~AbstC";
	mes "a]oϥΤ}baA";
	next;
	mes "[]";
	mes "LL̯uOqA";
	mes "ubⴤuCɭԡA";
	mes "~|oXӡAM";
	mes "L̿ܤF}bH檺ZA";
	mes "L̨ä٤פ}b⪺";
	next;
	mes "[]";
	mes "ޫ򻡡Aڭ̳OMާ@}bH";
	if(tu_archer01 == 1 || tu_archer01 > 2){
		next;
		mes "-AdڧJH-";
		mes "-ǥXӵլݤFA-";
		mes "-oⲴN@uA-";
		mes "-ѤWU\-";
		next;
		mes "[]";
		mes "..oӬO.. HeOA";
		mes "jvUڡAnоɧA";
		next;
		mes "[]";
		mes "ڪDFAаݧAQDǤƱO?";
		next;
		while(1){
			switch(select("About Archers.:Stats for Archers:End Conversation.")){
			case 1:
				mes "[]";
				mes "Archers specialize";
				mes "in shooting ^3131FFarrows^000000. We usually attack from a distance, but before we increase our Dodge Rate, we're pretty weak when it comes to one on one battles.";
				next;
				mes "[]";
				mes "Therefore, Archers tend to attack before the enemy gets too close.";
				mes "We also like to party with other people who can offer close";
				mes "range protection.";
				next;
				mes "[]";
				mes "Now, only Novices can";
				mes "become Archers after reaching";
				mes "Job Level 10 and learning all of the Basic Skills.";
				next;
				mes "[]";
				mes "Well experienced Archers can move on and change to the Second Job Class, becoming ^3131FFHunters^000000, ^3131FFBards^000000 if they are male, or ^3131FFDancers^000000 if they are female.";
				next;
				mes "[]";
				mes "If you reach Level 99";
				mes "as a Second Job Class character, you can change to a Transcendent Class with Valkyrie's help.";
				next;
				mes "[]";
				mes "Hunters can ultimately transcend into ^3131FFSnipers^000000, Bards into ^3131FFMinstrels^000000, and Dancers into ^3131FFGypsies^000000. I know that's pretty complex.";
				if(tu_archer01 == 1) set tu_archer01, 2;
				next;  
				break;
			case 2:
				mes "[]";
				mes "So you want to";
				mes "know more about Stats";
				mes "and how they affect Archer abilities? I'll do my best to explain."; 
				next;
				while(1){
					switch(select("STR", "^3131FFAGI^000000", "VIT", "^FF9900INT^000000", "^FF3131DEX^000000", "LUK", "End Conversation.")){
					case 1:
						mes "[]";
						mes "STR typically increases the da]kv of attacks. However, Archer class characters use weapons that rely on ^FF3131DEX^000000 to increase their da]kv.";
						next;
						mes "[]";
						mes "In a sense, STR might not be necessary for Archers, although I'm sure there are skills or situations where STR will come in handy.";
						next;
						mes "[]";
						mes "For instance, if you run out of arrows (which is every Archer's nightmare) and need to equip a Knife, having some STR might";
						mes "be helpful.";
						next;
						mes "[]";
						mes "Increasing STR will also";
						mes "increase the amount of weight";
						mes "that any character can carry. So if you have more STR, you can carry around more arrows.";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 2:
						mes "[]";
						mes "^FF3131AGI^000000 as you know, ";
						mes "^3131Ffincreases Attack Speed";
						mes "(ASPD)^000000 and affects ^3131FF Dodge Rate^000000.";
						next;
						mes "[]";
						mes "One of the drawbacks of being an Archer is having weaker strength and lower Dodge Rate. However, the Dodge Rate disadvantage is lessened by increasing your ^FF3131AGI^000000.";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 3:
						mes "[]";
						mes "^3131FFVIT^000000 will increase";
						mes "your Maximum HP and";
						mes "resistance to da]kv.";
						next;
						mes "[]";
						mes "Although Archers don't";
						mes "specialize in having any special kind of defense, having VIT will help alleviate the defensive weakness of the Archer class.";
						next;
						mes "[]";
						mes "VIT might be helpful";
						mes "depending on how you use it. Still, I wouldn't recommend focusing too much on increasing your VIT if you're an Archer.";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 4:
						mes "[]";
						mes "^FF0000INT^000000 is more";
						mes "important to the";
						mes "Archer class than";
						mes "you would think~";
						next;
						mes "[]";
						mes "As you increase ^FF0000INT^000000, you'll raise your Maximum SP, meaning you";
						mes "can use special skills more often.";
						next;
						mes "[]";
						mes "For Hunters, one of the Second Job Classes for Archers, having higher INT will increase the da]kv inflicted by ^3131FFFalcons^000000.";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 5:
						mes "[]";
						mes "Now DEX is almost";
						mes "without a doubt the";
						mes "most important stat";
						mes "for any Archer.";
						next;
						mes "[]";
						mes "^FF3131DEX^000000 ^3131Ffincreases the da]kv^000000";
						mes "of Archer class weapons that fire arrows. These include ^3131FFBows^000000, ^3131FFInstruments^000000 and ^3131FFWhips^000000.";
						next;
						mes "[]";
						mes "Dexterity enhances an Archer's ability to hit weak points and do more da]kv, which is why weapons that use arrows don't rely on STR like weapons used by other classes.";
						next;
						mes "[]";
						mes "Just like any other class, ^FF3131DEX^000000 increases ^3131FFAccuracy (HIT)^000000 and slightly enhances Attack Speed (ASPD).";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 6:
						mes "[]";
						mes "^FF0000LUK^000000 affects your";
						mes "Perfect Dodge rate";
						mes "and Critical rate.";
						next;
						mes "[]";
						mes "For Hunters, one of the Second Classes for the Archer, LUK increases the chance of ^3131FFBlitz Beat^000000 occurring automatically. So Hunters who rely on their Falcons might want to invest in LUK.";
						next;
						if(tu_archer01 == 1) set tu_archer01, 2;
						break;
					case 7:
						mes "[]";
						mes "So is there";
						mes "anything else that";
						mes "you want to ask me?";
						next;
						set .@exitwhile,1;
						break;
					}
				}
				break;
			case 3:
				mes "[]";
				mes "Once an Archer shoots an arrow,";
				mes "he can't stop its flight or change his target. That's why Archers need to be level headed and really careful in battle.";
				next;
				mes "[]";
				mes "Someday, I'd like to become a great Archer and use my skills for the good of Rune Midgard.";
				close;
				break;
			}
		}
	} else if(tu_archer01 == 2){
		next;
		mes "[]";
		mes "Thanks for listening.";
		mes "I know I gave you a lot of information, but I think it's important that everyone";
		mes "understands archery.";
		next;
		mes "[]";
		mes "If you feel comfortable enough with the knowledge I've taught you, you should go back to dڧJ jv. But if you still have questions, you can always come and ask me.";
		close2;
		//misceffect EF_WIND ;
		set tu_archer01, 3;
		if(JobLevel == 1){
			getexp 0,30;
		} else if((JobLevel > 1) && (JobLevel < 11)){	
			getexp 0,100;
		} else if((JobLevel > 10) && (JobLevel < 21)){
			getexp 0,250;
		} else {
			getexp 0,500;
		}
		end;
	}
	close;
}

//=================================================Target====================================================
pay_arche,76,135,3	script	#vl	111,{
	end;
OnHit2:
	misceffect EF_HIT2;
	sleep2 200;
	misceffect EF_HIT2;
	end;
}

//=================================================Acolyte====================================================
mjolnir_11,27,223,3	script	Acolyte#tu	95,{
	mes "[Acolyte]";
	if(tu_archer01 == 14){
		if(gettime(3) >= 18 && gettime(3) < 22){
			mes "H-hello!";
			mes "Umm, umm...";
			mes "Are you R-pB F's";
			mes "friend t-too?";
			next;
			mes "[Acolyte]";
			mes "M-my name is Mafra.";
			mes "Ever since he saved my life, Raiden has a-always been a good f-friend to me. He's such a great Archer";
			mes "and a really nice person!";
			next;
			mes "[Acolyte]";
			mes "Um, and...";
			mes "Uh... Oh no~";
			mes "What am I supposed";
			mes "t-to tell you...?";
			emotion e_swt2;
			next;
			mes "[Acolyte]";
			mes "Oh, since I'm training to be an Acolyte, I'm supposed to help out the people he's teaching. So...";
			mes "Let's h-help each other train!";
			mes "Um, is that okay?";
			next;
			switch(select("Sure.:No thanks.:pB F is mine!")){
			case 1:
				mes "[Acolyte]";
				mes "Wow!";
				mes "Thank you, thank you!";
				mes "I''ll try my very best!";
				set tu_archer01, 15;
				close;
				break;
			case 2:
				mes "[Acolyte]";
				mes "Oh... Oh.";
				mes "I'm so sorry.";
				mes "If you don't need";
				mes "my help, I guess";
				mes "that's alright...";
				emotion e_sob;
				close;
				break;
			case 3:
				mes "[Acolyte]";
				mes "Eh?!";
				mes "R-really?";
				mes "I guess he doesn't";
				mes "need to tell me if";
				mes "he already has a girlfriend...";
				next;
				mes "[Acolyte]";
				if(Sex){
					mes "W-wait!";
					mes "Y-you're a man!";
					mes "D-d-d-don't tease me";
					mes "like that! I'm serious!";
					set tu_archer01, 15;
					close;
				} else {
					mes "And he's so brave";
					mes "and funny and smart.";
					mes "Y-you're lucky to have him.";
					mes "^333333*Sniff*^000000 I... I...";
					next;
					mes "[Acolyte]";
					mes "^333333*Sniffle*^000000";
					mes "I'll d-do my best to help you!";
					mes "I wish you both happiness! (Waaaaaah~!)";
					set tu_archer01, 15;
					close;
				}
				break;
			}
			end;
		} else {
			mes "^666666Zzzzz...^000000";
			mes "Wh-wha...?";
			mes "Who are you?";
			//misceffect EF_SLEEPATTACK;
			next;
			mes "[Acolyte]";
			mes "Wait, I know...";
			mes "Y-you're... ^666666*Yawn*^000000";
			mes "So sleepy. Take this for now...";
			set @kurae_heal, rand(1,4);
			if(@kurae_heal == 1){
				unitskilluseid getcharid(3),28,3;
			} else if(@kurae_heal == 2){
				unitskilluseid getcharid(3),28,9;
			} else if(@kurae_heal == 3){
				unitskilluseid getcharid(3),28,10;
			} else if(@kurae_heal == 4){
			}

			set @kurae_agi, rand(1,3);
			if(@kurae_agi == 1){
				unitskilluseid getcharid(3),29,0;
			} else if(@kurae_agi == 2){
				unitskilluseid getcharid(3),29,5;
			} else if(@kurae_agi == 3){
				unitskilluseid getcharid(3),29,10;
			}

			set @kurae_bls, rand(1,3);
			if(@kurae_bls == 1){
				unitskilluseid getcharid(3),34,0;
			} else if(@kurae_bls == 2){
				unitskilluseid getcharid(3),34,5;
			} else if(@kurae_bls == 3){
				unitskilluseid getcharid(3),34,10;
			}
			close;
		}
	} else if(tu_archer01 == 15){
		if((gettime(3) >= 18) && (gettime(3) < 22)){	//CHECK
			mes "^666666Zzzzz...^000000";
			mes "Wh-wha...?";
			mes "Who are you?";
			//misceffect EF_SLEEPATTACK;
			next;
			mes "[Acolyte]";
			mes "pB F?";
			mes "I can't believe";
			mes "I feel asleep fo--";
			mes "^666666Zzzzzzz...^000000";
			next;
			mes "[Acolyte]";
			mes "^666666Zzzz^000000--Oooh!";
			mes "J-just take this before";
			mes "I fall asleep again~! ^666666*Yawn*^000000";

			set @kurae_heal, rand(1,4);
			if(@kurae_heal == 1){
				unitskilluseid getcharid(3),28,3;
			} else if(@kurae_heal == 2){
				unitskilluseid getcharid(3),28,10;
			} else if(@kurae_heal == 3){
				unitskilluseid getcharid(3),28,8;
			}

			set @kurae_agi, rand(1,3);
			if(@kurae_agi == 1){
				unitskilluseid getcharid(3),29,0;
			} else if(@kurae_agi == 2){
				unitskilluseid getcharid(3),29,5;
			} else if(@kurae_agi == 3){
				unitskilluseid getcharid(3),29,10;
			}

			set @kurae_bls, rand(1,3);
			if(@kurae_bls == 1){
				unitskilluseid getcharid(3),34,0;
			} else if(@kurae_bls == 2){
				unitskilluseid getcharid(3),34,5;
			} else if(@kurae_bls == 3){
				unitskilluseid getcharid(3),34,10;
			}
			close;
		} else {
			mes "Okay~!";
			mes "Let me try";
			mes "casting a spell";
			mes "to help you! Yaa~p!";

			set @kurae_heal, rand(1,3);
			if(@kurae_heal == 1){
				unitskilluseid getcharid(3),28,3;
			} else if(@kurae_heal == 2){
				unitskilluseid getcharid(3),28,10;
			} else if(@kurae_heal == 3){
				unitskilluseid getcharid(3),28,8;
			}

			set @kurae_agi, rand(1,2);
			if(@kurae_agi == 1){
				unitskilluseid getcharid(3),29,10;
			} else if(@kurae_agi == 2){	
				unitskilluseid getcharid(3),29,5;
			}

			set @kurae_bls, rand(1,2);
			if(@kurae_bls == 1){
				unitskilluseid getcharid(3),34,10;
			} else if(@kurae_bls == 2){
				unitskilluseid getcharid(3),34,5;
			}
			close;
		}
	}
	mes "...";
	mes "W-why does";
	mes "traveling make";
	mes "me sooo sleepy...?";
	mes "^666666Zzzzzzzz...^000000";
	//misceffect EF_SLEEPATTACK ;
	close;
}

//=================================================Nv |H====================================================
pay_arche,130,113,3	script	Nv |H#tu	740,{
	mes "[Nv |H]";
	if(tu_archer02 > 0){
		if((countitem(1032) > 0) || (countitem(905) > 0 )){	// Blossom_Of_Maneater & Stem
			mes "Great...!";
			mes "I've been waiting";
			mes "for the Icarus Guild";
			mes "to send somebody";
			mes "to help us! Finally!";
			emotion e_sob;
			next;
			mes "[Nv |H]";
			mes "Would you like to sell ^3131FFStems^000000";
			mes "and ^3131FFManeater Blossoms^000000 to";
			mes "the Alchemist Guild? We'll buy";
			mes "each Stem for ^3131FF30 Zeny^000000 and each";
			mes "Maneater Blossom for ^3131FF130 Zeny^000000.";
			next;
			switch(select("Sell all Stems and Maneater Blossoms.:Don't sell anything.")){
			case 1:
				mes "[Nv |H]";
				mes "Thank you very much!";
				mes "This will really help";
				mes "us in maintaining our";
				mes "Flora field! I really";
				mes "appreciate your help~";

				set @alche_f,countitem(1032);// Blossom_Of_Maneater
				set @alche_s,countitem(905);// Stem
				set @f_zeny, @alche_f * 130;
				set @s_zeny, @alche_s * 30;
				set @total_zeny, @f_zeny + @s_zeny;
				if(countitem(1032) == 0){
					delitem 905, @alche_s;
				} else if(countitem(905) == 0){
					delitem 1032, @alche_f;
				} else {
					delitem 1032, @alche_f;
					delitem 905, @alche_s;
				}
				set Zeny,Zeny+@total_zeny;
				close;
				break;
			case 2:
				mes "[Nv |H]";
				mes "Seriously...";
				mes "I'm on the verge of begging!";
				mes "The Alchemist Guild really needs lots of new supplies to keep our Flora field running!";
				emotion e_sob;
				close;
				break;
			}
		} else {
			mes "I don't know if you've heard";
			mes "from Kavaruk, but our Flora field is getting ruined by stray cats.";
			emotion e_sob;
			next;
			mes "[Nv |H]";
			mes "No matter how much we chase";
			mes "them away, they always manage to come back. We really have no choice but to replace what they destroy.";
			next;
			mes "[Nv |H]";
			mes "We'll reward you if you can bring us ^3131FFStems^000000 and ^3131FFManeater Blossoms^000000";
			mes "to help us in our field maintenance efforts. These Flora are crucial since they provide funds for our guild. Without them...";
			close;
		}
	}
	mes ".. 򳣨SHөO..ܫO..";
	close;
}

//=====================================================================================================
prontera,126,335,5	script		51,{
	mes "[]";
	if(tu_archer02 < 3){
		mes "I am the Bard";
		mes "who sings only for";
		mes "himself. The gentle";
		mes "breeze is the only";
		mes "audience I have.";
		next;
		mes "[]";
		mes "I am ";
		mes "of the Wind.";
		mes "I sing for no man,";
		mes "so you had best be on";
		mes "your way. I'm sorry, but";
		mes "I have no songs to share.";
		if(tu_archer02 == 2) {
			next;
			menu "dڧJ jv told me to find you!",-;
			mes "[]";
			mes "Really now?";
			mes "I suppose it";
			mes "can't be helped.";
			mes "I really should";
			mes "have contacted him.";
			next;
			mes "[]";
			mes "However, I'm very tired from the long trip. I'm exhausted from the crowding of this city and the hundreds of talking people.";
			mes "I can't handle it all...";
			next;
			mes "[]";
			mes "Why can't I be like everyone else? It seems that as I approach people, my heart retreats further away from them. I wonder why that is?";
			next;
			mes "[]";
			mes "I became a Bard to try to fix this social complex of mine, but to";
			mes "no avail. Still, I feel much more at ease when I sing. Ah, but I've said too much already.";
			next;
			mes "[]";
			mes "dڧJ jv";
			mes "asked you to help";
			mes "me? Well then, I have";
			mes "a favor to ask of you.";
			next;
			mes "[]";
			mes "Here in the capital of the";
			mes "Rune Midgarts Kingdom, there's supposed to be a fountain in the central plaza. Everyone seems to stop and chat over there.";
			next;
			mes "[]";
			mes "However, I have a fear of other people and I can't bring myself to go near the crowds of people there. It's embarassing for me to admit this as a Bard...";
			next;
			mes "[]";
			mes "Would you please go and see if there's any news being spread around in that area for me?";
			set tu_archer02, 3;
		}
		close;
	} else if(tu_archer02 == 3){
		mes "I'm ashamed to ask,";
		mes "but would you go the fountain in Prontera's central plaza and see";
		mes "if there's any news?";
		close;

	} else if(tu_archer02 == 4){
		mes "I see...";
		mes "Nothing much.";
		mes "Another person";
		mes "found an Emperium";
		mes "and is starting a";
		mes "brand new guild...";
		next;
		mes "[]";
		mes "^3131FFEmperium^000000...";
		mes "There are a lot of ambitious people in Morroc that want one of those. Even in my hometown of Payon,";
		mes "there are people clamoring to obtain one...";
		next;
		mes "[]";
		mes "Supposedly, having an Emperium";
		mes "will give you the power to change the world. People are bound to be attracted to it.";
		next;
		mes "[]";
		mes "Hmm...?";
		mes "I sense something";
		mes "dark and ominous...";
		mes "I wonder what it could be?";
		emotion e_hmm;
		next;
		mes "[]";
		mes "I'm probably just stressed and exhausted. I'll feel better once";
		mes "I get some rest. Would you like to join me and listen to the flowing water?";
		next;
		mes "[]";
		mes "It's not the greatest feeling if you stay here for too long, but the sound of this water reminds me of home. Did you see the lake by the Icarus Guild? These waters remind me of that place.";
		next;
		mes "[]";
		mes "^333333*Yawn...*^000000";
		mes "I haven't talked";
		mes "like this in so long.";
		mes "I'm so tired, I think";
		mes "I'll rest just a little...";
		next;
		mes "[]";
		mes "..........";
		next;
		mes "^3355FF of the Wind";
		mes "has fallen fast asleep.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Ah...";
		mes "So peaceful~";
		next;
		mes "^3355FFThe rhythm of the lapping waters gently eases you into a state of perfect relaxation. The cold, crisp water would feel so refreshing if you dipped your feet into it...^000000";
		//sound "se_subterranean_waterwave.wav" 1 0 0
		next;
		mes "[???]";
		mes "...";
		soundeffectall "se_littlewaves02.wav",0;
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Huh?";
		mes "What was";
		mes "that noise?";
		next;
		mes "[????]";
		mes "AAAAAAAAAAAAAAAHHHHHHHHHHH!!!!!";
		emotion e_omg;
		soundeffectall "se_scream_w01.wav",0;
		next;
		mes "["+strcharinfo(0)+"]";
		mes "What the--?!";
		mes "That sounds like";
		mes "screams coming from";
		mes "inside Prontera Castle!";
		next;
		mes "^3355FFYou try to wake ";
		mes "but he's deeply asleep";
		mes "and won't budge at all.^000000";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I can't help it then.";
		mes "I'd better go check";
		mes "this out on my own.";
		set tu_archer02, 5;
		close2;
		end;

	} else if(tu_archer02 > 4 && tu_archer02 < 7){
		mes "^333333Zzzzz...^000000";
		close;

	} else if(tu_archer02 == 8){
		mes "Where did you go?";
		mes "I thought you might have been kidnapped since you weren't";
		mes "here when I woke up.";
		next;
		mes "[]";
		mes "So everyone said nothing";
		mes "happened when you asked";
		mes "about the shrieks you heard?";
		mes "That's really peculiar...";
		next;
		mes "[]";
		mes "Even the Emperium you mentioned earlier. I thought it was supposed to be a rare item, but why is it so easy for so many people to get";
		mes "one? It's very strange...";
		next;
		mes "[]";
		mes "Huh. I better investigate this";
		mes "a little more, so I'll stay here to gather more information. For now, you should head back to Payon and let dڧJ jv know that I'm doing alright.";
		next;
		mes "[]";
		mes "And one day...";
		mes "I guess I'll finally";
		mes "have a song that I can";
		mes "share with you.";
		set tu_archer02, 9;
		close2;
		end;
	}
	mes "...";
	mes "......";
	close2;
	end;
}

//=================================================s |====================================================
prontera,167,281,3	script	s |#tu	753,{
	mes "[s |]";
	mes "ڦbMiHڦPͦ@ih!";
	mes "OMOݳƪih̳AOASݤFA֥[JڪCa!";
	mes "un֦ɩRB ^3355FFR^000000AO藍|߱ڭ̪!";
	if(tu_archer02 == 3) set tu_archer02, 4;
	close;
}

//=================================================]kv====================================================
prontera,144,301,5	script	]kv#tu	123,{
	mes "[]kv]";
	mes "AݨbU۶Ҥ||H?";
	next;
	emotion e_pif;
	mes "[]kv]";
	mes "LLSInM󪺼ˤlA|ıo³J?H";
	mes "ܥx]ܥXڡA";
	mes "̪񦳦W𪺤|i~hOAַ|Q[JWҤpSS]OAYN覨ߪ|O?";
	next;
	mes "[]kv]";
	mes "ڧr~";
	mes "ڦŮvܡAڷQ[JꤺWҳ̤j̤j|OA";
	mes "ڤ@Qb۵RZ˪MhMRt¾̤AIi۫Ӯ]kˤl!";
	next;
	mes "[]kv]";
	mes "u";
	mes "D`D`.E.O";
	close;
}

//=================================================j====================================================
prt_castle,76,165,6	script	j#tu	55,{
	mes "[j]";
	mes "The royal family";
	mes "is extremely busy";
	mes "at the moment, handling";
	mes "our nation's administration.";
	if(tu_archer02 == 5){
		next;
		mes "["+strcharinfo(0)+"]";
		mes "I heard screams";
		mes "from outside! Did";
		mes "something happen?";
		next;
		mes "[j]";
		mes "...";
		mes "......";
		next;
		mes "[j]";
		mes "Ah, there are a few stray cats running around, those Wild Roses, so those noises you heard must have been them. Everything is fine here in the palace.";
		set tu_archer02, 6;
		close;
	} else if(tu_archer02 == 7){
		next;
		mes "^3355FFThe urgency that the j expressed earlier has been";
		mes "replaced with a stone cold feeling of sternness. He probably won't tell you much more information,";
		mes "no matter how much you ask him.";
		close;
	} else if(tu_acolyte01 == 25){
		next;
		mes "["+strcharinfo(0)+"]";
		mes "Um...";
		mes "I hear that";
		mes "the royal family";
		mes "might be in sort of";
		mes "trouble. Is there any";
		mes "way I could help?";
		next;
		mes "[j]";
		mes "...";
		mes "......";
		next;
		mes "[j]";
		mes "You must be mistaken.";
		mes "The royal family is fine,";
		mes "especially since our";
		mes "kingdom is at peace.";
		next;
		mes "[j]";
		mes "Perhaps you've gotten that idea because it's very difficult to meet any member of the royal family. Please understand that they're";
		mes "all very busy trying to serve";
		mes "the people.";
		next;
		mes "[j]";
		mes "As a holy servant, I'm sure that you'll find plenty of other people who have need of your help and abilities outside of the palace.";
	} 
	close;
}

//=================================================Range NPC====================================================
prt_castle,94,150,4	script	#sound_tu	139,10,10,{
OnTouch:
	if(tu_archer02 != 6) end;
	mes "[j]";
	mes "Contact the";
	mes "Prontera Church.";
	mes "Hurry, this is urgent!";
	set tu_archer02, 7;
	close;
}

//=================================================^ D====================================================
monk_in,19,43,1	script	^ D	60,{
	mes "[^ D]";
	if(tu_archer02 == 7){
		mes "Greetings.";
		mes "I doubt that you're here to change to the Monk job, but may I help you with something? Perhaps you're here for a confession?";
		next;
		mes "[^ D]";
		mes "Hm? Work related to the Palace? Yes, I'm in charge of that area. So how may I help you?";
		next;
		if(select("Has something happened to the Kingdom?:Nothing.")==1){
			mes "[^ D]";
			mes "...!!";
			next;
			mes "[^ D]";
			mes "...";
			mes "......";
			next;
			mes "[^ D]";
			mes "Ho ho~";
			mes "Of course not!";
			mes "The king and I regularly write to each other, but I haven't heard of anything in particular. Please don't worry yourself.";
			next;
			set tu_archer02, 8;
		}
		mes "[^ D]";
		mes "Good luck on";
		mes "your journeys,";
		mes "brave adventurer.";
		unitskilluseid getcharid(3),29,10;
		unitskilluseid getcharid(3),34,10;
		close;
	}
	mes "...Now, I have something to think about. Please visit me later, young sheep..";
	close;
}
